home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club 2000 May / SOMC_May2000-Ultimate.iso / pc / Programs / xsetup / _SETUP.2 / Group3 / XQ FileCache Settings.xpl < prev    next >
Encoding:
XSetup plugin  |  1999-12-04  |  2.1 KB  |  64 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="2"
  3. "COUNT"="2"
  4. "UIPATH"="System\File System\Options"
  5. "NAME"="Windows 9x File Cache"
  6. "WARNING"="This setting is highly dangerous!!! Think twice before you change it, it might make your computer faster but can also bring up a "VFAT resource" Blue Screen!"
  7. "VERSION"="1.51"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Min. Cache (KB)"
  10. "TEXT 2"="Max. Cache (KB)"
  11. "DESCRIPTION 1"="If you want to control Windows how much RAM it should use for the file cache, enter the desired values here."
  12. "DESCRIPTION 2"=" "
  13. "DESCRIPTION 3"="It seems to have better results with the maximum cache size set to one eigth [1/8] of the total RAM memory installed in the system.  This way it gives the cache plenty of memory to use and doesn't take too much away from the operating system."
  14. "DESCRIPTION 4"="For example, if you have 128 MB of RAM, a max cache of 16384 KB (16 MB) and a minimum cache of 8096 KB (8 MB) would be a good choice."
  15. "DESCRIPTION 5"="Another tip: Try setting the minimum and maximum sizes close together if you use many large, disk access intensive applications like a lot of the application suites that are available. This can improve their performance considerably."
  16. "AUTHOR"="Xteq Systems"
  17. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  18. "COMMENT 1"="For more information, go to http://www.xteq.com or write to TeXHeX@xteq.com."
  19. "COMMENT 2"="Thanks to AXCEL216 for this great plug."
  20.  
  21.  
  22. sf="SYSTEM.INI"
  23. ss="vCache"
  24. v1="MinFileCache"
  25. v2="MaxFileCache"
  26. Sub Plugin_Initialize 
  27.  if GetWinVer=2 or GetWinVer=4 then
  28.   Disable 
  29.  else
  30.   i=IniReadValue(sf,ss,v1)
  31.   SetUIElement 1,i
  32.  
  33.   i=IniReadValue(sf,ss,v2)
  34.   SetUIElement 2,i
  35.  end if
  36. End Sub
  37.  
  38. Sub Plugin_CheckData(ElementIndex)
  39. End Sub
  40.  
  41. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  42.  i=GetUIElement(1)
  43.  if len(i)=0 then
  44.     Call IniWriteValue(sf,ss,v1,"")
  45.  else
  46.     Call IniWriteValue(sf,ss,v1,i)
  47.  end if
  48.  
  49.  i=GetUIElement(2)
  50.  if len(i)=0 then
  51.     Call IniWriteValue(sf,ss,v2,"")
  52.  else
  53.     Call IniWriteValue(sf,ss,v2,i)
  54.  end if
  55.  
  56.  Restart
  57. End Sub
  58.  
  59. Sub Plugin_Terminate 
  60. End Sub
  61.  
  62.  
  63.  
  64.